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MOCA: Introducción 
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Qué es MOCA? 



MOCA es un entorno de RedPrairie diseñado para crear 
aplicaciones basadas en componentes. 

> La misión de MOCA es ofrecer a los desabolladores una 
infraestructura técnica que permita y promueva la 
interoperabilidad de componentes de una manera simple, 
efectiva y libre de implementaciones. 

> MOCA ofrece un método para definición, invocación y 
licénciamiento de componentes así como librerías de soporte 
para ayudar en la creación eficiente de aplicaciones. 
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Application Framework 
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Application Framework 
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Por qué MOCA? 



Clientes 

> Los clientes son aplicaciones cuya principal responsabilidad es 
la salida de datos, interactuar con el usuario e invocar 
componentes en un servidor. 

> Toda la funcionalidad es delegada a los componentes que 
existen en el servidor 

> Esto permite que las aplicaciones MOCA sean desarrolladas 
mucho más rápidamente que una aplicación cliente que 
contiene lógica y funcionalidad adicionales. 
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Por qué MOCA? 

Fácil de Personalizar 

> MOCA ofrece una arquitectura para personalizar fácilmente una 
aplicación sin tener que reescribir numerosas líneas de código. 

> Esto hace mucho más fácil añadir o cambiar la funcionalidad en 
un producto estándar. 
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Por qué MOCA? 

Actualizaciones de productos estándar 

> La arquitectura de MOCA hace más fácil la aplicación de 
parches y/o actualizaciones al producto estándar ya que todas 
las personalizaciones residen en diferentes componentes que 
están fuera del alcance del producto estándar. 
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MOCA: Historia 
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Historia 

• Moca fue originalmente derivado de la librería del 
servidor de DLx® Warehouse/D. 

> La primera liberación fue en 1994. 

• La librería del servidor DLx® Warehouse/D soportaba 
gran parte de la misma funcionalidad que Moca soporta 
actualmente. 
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Historia 

• Los componentes pueden ser desarrollados usando 
sintaxis local y componentes C. 

• Los componentes pueden tener argumentos y pueden 
tener triggers que sean otros comando o sintaxis SQL. 
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MOCA: Componentes 
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Componentes 



• Un componente es una implementación de 
funcionalidad capaz de ejecutarse individualmente y 
que tiene una interfaz conocida. 

> Los usuarios de un componente no necesitan saber detalles de 
la implementación que se maneja "detrás de cámaras". 

> Solo necesitan saber que entradas (argumentos) y salidas 
(datos publicados) son necesarias y que funcionalidad ofrece el 
componente. 
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Componentes 

• Combinando un componente, que provee una 
funcionalidad específica con otro u otros componentes 
que proveen funcionalidades específicas, se pueden 
realizar tareas más complejas fácilmente 
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Niveles de componentes 

• Todos los comandos son almacenados en varios niveles 
de componentes 

> Cada nivel tiene un numero especifico de secuencia. 

> El servidor de procesos busca el comando requerido en orden 
descendente basándose en el numero de secuencia. 

• Esto es lo que permite una fácil implementación de 
nuevos comandos para Redprairie y sus clientes. 
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Niveles de Secuencia en los Componentes 





Sequence 


Usr (User Customizations) 


9000 


Var (RedPrairie Customizations) 


8000 


Specific Product (i.e. Warehouse Management) 


300 - 3500 


SAL (Shared Application Library) 


200 - 299 


MCS (McHugh Component System) 


100-149 


MOCA (McHugh Open Component Architecture) 


0-99 
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MOCA: Elementos de la 
arquitectura MOCA 
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Arquitectura 
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Arquitectura - Connection Manager 

• El Connection Manager es el módulo principal 
responsable de administrar las solicitudes de conexión 
entrantes en un puerto específico. 

> Las solicitudes de conexión pueden ser originadas desde el 
cliente Windows, la Terminal de RF, MSQL, Integrator, o 
cualquier otro sistema MOCA habilitado. 

• Del lado del servidor, estos clientes tienen la misma 
estructura y ejecutan los mismos tipos de comandos 
exactamente de la misma manera. 
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Arquitectura -Connection Manager 

• El connection Manager es el punto inicial para toda 
actividad MOCA 

> Todos los clientes se conectan por el connection manager. 

> Cuando un cliente hace una solicitud, el connection Manager 
detecta la actividad en el puerto y pasa el requerimiento a un 
MOCA Server Process. 
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Arquitectura - MOCA Server Process 

• El MOCA Server Process es el módulo de trabajo 
actual. 

• Mientras el connection manager controla principalmente 
el número de procesos del servidor y el tráfico 
relacionado con esos procesos, el MOCA Server 
Process realiza todo el procesamiento solicitado por el 
cliente 
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Arquitectura - Archivo de Memoria 

• El archivo de memoria contiene la configuración actual 
de los comandos y triggers del sistema. 

> Los cambios en la configuración no tienen efecto hasta que el 
archivo de memoria es recargado. 
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Arquitectura 
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Analogía 



• Repartidores - Moca Server Process 

• Operador - Connection Manager 

• Orden - Client Request 

> Donde cualquier Repartidor puede procesar cualquier Orden 

> Toda la comunicación es atreves del Operador 

> El Operador asigna un Repartidor disponible 

• Si ninguno esta disponible, crea un nuevo Repartidor 

• Si esta ocioso, elimina los Repartidores innecesarios 

> El Repartidor realiza la tarea solicitada y regresa a la lista de 
Repartidores disponibles. 
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Consola MOCA 



• La consola MOCA es una utilería que ofrece 
información útil acerca del sistema. 

• La información se divide en tres categorías: 

> Información de MOCA server process. 

> Información de la conexión del cliente. 

> Tareas de fondo. 
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MOCA Consolé 



■ RedPrairie Consolé 

^ ■ jnoguera-20 11: 4600/console/console . do ímoca . consolé, taskflow : resourcelisage 



Google 



P \4t O- 



¡RedPrairie* 



Resource Usage 



■ Refresh 



Memory 



Current Heap Used: 98mb 
Current Heap Size: 173mb 
Max Heap Size: 494mb 



Sessions 



Current Sessions: 0 
Peak Sessions: 2 
Max Sessions: 100 



Native Processes 










Current Native Processes: 


1 


Peak Native Processes: 


1 


Max Native Processes: 


20 



Datábase Connections 



Current Datábase Connections: 4 
Peak Datábase Connections: 4 
Max Datábase Connections: 100 



^oqout 



Sessions 



Native Processes 



Datábase Connections 

Jobs 

Tasks 

Registry 



Component Libraries 



Environment Variables 
System Properties 
Resource Usage 
Command Profile 
Log Files 



J 
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MOCA: Elementos de un 
comando. 
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Elementos de un comando 

• Nomenclatura 

• Argumentos 

• Datos Publicados 

• Triggers 
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Nomenclatura 

• En términos de MOCA, todos los componentes de 
servicio son conocidos por un nombre de componente. 

• El nombre del componente define una acción o 
instrucción bajo la cual el servidor actúa. 
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Nomenclatura 



• El nombre del componente es definido por una combinación 
de verbos/sustantivos. 

> El verbo define la acción; el sustantivo define el objetivo de la 
acción y puede incluir sintaxis gramática (an, a, for, the, etc.). 

> El verbo es una palabra sencilla, y el sustantivo puede ser 
múltiple. 

• El verbo y los sustantivos están hechos para una 
clasificación de comandos más sencilla (p. e. "list" 
commands vs. "change" commands vs. "move" 
commands). 
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Nomenclatura 



• Todos los comandos y triggers personalizados deben ser 
nombrados como sigue para estandarizar la nomenclatura de 
comandos en el futuro. 

> <verbo> var <sustantivo(s)>, for VAR level changes 

> <verbo> usr <sustantivo(s)>, for USR level changes 

• Algunos ejemplos son: 

> move inventory 

> allocate var shipment location 

> rate usr shipment. 
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Argumentos 



• Los comandos hechos por los clientes pasan argumentos y 
operadores. 

> La transmisión de argumentos a los componentes es manejada 
por MOCA. 

> No todos los argumentos necesitan ser pasados al componente. 

> Los argumentos pueden ser requeridos u opcionales se pueden 
usar también valores constantes. 

move inventory 
where lodnum = "LODO 9" 
and dstloc = "X1034" 
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Argumentos - alias 



• Algunos argumentos de comando tienen un nombre 
alternativo para hacer que la sintaxis del comando sea 
de uso más convencional. 

> Un ejemplo más entendible del mismo comando sería: 

move inventory 
where load = "LODO 9" 

and destination = "X1034" 
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Published Data 

• Los componentes pueden o no regresar datos a los 
clientes. 

• El dato es publicado en formato de filas/columnas 
donde cada columna tiene un nombre. Al igual que los 
datos se representan en las hojas de cálculo. 
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Triggers 

• Además de los argumentos, los comandos también 
pueden tener triggers. 

> Los triggers pueden ser otros comandos o sentencias SQL. 

• Los triggers siempre se ejecutan con un comando. 

> Si el trigger regresa un error, la transacción completa no se 
lleva a cabo, preservando la integridad de la transacción. 

> La configuración del trigger para el sistema se conserva en el 
mismo sistema y no es afectada por actualizaciones del 
producto. 
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MOCA: Creación de 
comandos 
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Creación de comandos 



El añadir un nuevo comando al sistema DLx® consiste 
en un proceso de tres pasos: 

1 . Escribir la sintaxis apropiada y la documentación de soporte. 

2. Añadir el comando al archivo de memoria de comandos 
disponibles. 

3. Detener y reiniciar el sistema DLx® para que el nuevo 
comando sea accesible a todos los procesos de fondo. 
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Escribir el Comando. 



• Hay dos formas para crear comandos/triggers 

> Administración de comandos de servidor 

• Aquí los comandos son creados con la ayuda de una aplicación en 
el cliente DLx®. 

• Los usuarios no necesitan saber la estructura del archivo solo los 
datos que contendrá cada comando. 

> Creación manual de archivos (\mcmd, *.mtrg) 

• Los comandos pueden ser creados usando cualquier editor de 
texto. 

• Aquí los usuarios deben saber la estructura del archivo del 
comando. 
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MOCA: Creación de 
comandos - Admón. de 
Comandos de Servidor 
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Admón de Comandos de Servidor 

• La aplicación de Admón. de Comandos de Servidor es 
la ubicación central para ver, modificar, y crear 
comandos MOCA. 

• La aplicación se divide en dos secciones principales, el 
árbol a la izquierda y la sección de detalles a la 
derecha. 

• El árbol clasifica cada comando MOCA por secciones 
de aplicación. 
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Admón de Comandos de Servidor 



• Para crear un nuevo comando, de clic en el botón nuevo 
en la barra de herramientas y la pantalla será habilitada 
para crear el nuevo comando. 

> La pestaña de Configuración contiene el nombre, sintaxis, 
descripción del comando, etc. 

> La pestaña de Argumentos lista todas las variables usadas en 
el nuevo comando MOCA. 

> La pestaña Triggers liga el comando con el trigger 
correspondiente, si es que el comando ejecuta algún trigger. 

> La pestaña Documentación muestra información del usuario 
acerca del comando y el contexto en el que se usa. 
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Admón de Comandos de Servidor 



RedPrairie E 2 e™ 



File View Tools Applications Open Applications Actions Help 
&Favorites \¡Qj C^Locate 



IRedPrairie" 



System Tools > 

I Server Command Maintenance 



Exit 



m 

New 



y u 

Clear 



2- 
Refresh 



Help 



Command List 
Filter: |~ 



All Levéis 



Command: 



Triggers: 



~3 



> Command Ñame 



acknowledge ems alert 
acknowledge message for devi 
add cycle count locations 
add job 
add job env 

add missing married lines 

add missing sub lines 

add policy Ítem to group 

add task 

add task env 

add templates to schema 

add xml attribute 

add xml element 

add xml text node 

adjust inventory quantities for i 

adjust non serialized asset qua 

allocate cancelled picks 

allocate distribution on deposit 

allocate emergency replenishm 

allocate inventory 

allocate inventory and location 

allocate inventory for cross doc 

allocate location 

allocate next wave 

allocate pick group 

allocate resource location 

allocate wave 

allocate work order 

append shipment change defer 

apply part footprint change for 

apply result filter 

apply stylesheet 

approve delta job 

approve propagation 

archive components 

Open Applications ( 1 \ \ 
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Command Ñame: 
Component Level: 
Description: 



Type: | 



C Function 



V Insecure 

V Requires New Transaction 



Arguments - 




WMDl(GMT) Connection:http://localhost:4600/savioe User: SUPER 
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MOCA: Creación Manual del 
Archivo 
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Creando Comandos 



<command> 

<name>list rfid gtin detaik/name> 

<description>List RFID GTIN detail.</descript¡on> 

<type>Local Syntax</type> 

<local-syntax> 

<![CDATA[ 

[select * 

from rfid_tag_sernum 

where @+reference] 
]]> 

</local-syntax> 



<documentation> 

<remarks> 

<![CDATA[ 

This command lists existing RFID serial numbers. 
]]> 

</remarks> 

<exception value="eOK"> 

The command completed successfully. 

</exception> 

</documentation> 

</command> 
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Archivos *.MCMD 



Información de funcionalidad del 
comando que incluye: 

Nombre 

Descripción 

Tipo de Sintaxis 



Información de documentación del 
comando que incluye: 

Comentarios 

Descripción 

Ejemplos 

Datos devueltos 
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Creando Comandos - 



<command> 

<name>list rfid gtin detaik/name> 

<description>List RFID GTIN detail.</descr¡pt¡on> 

<type>Local Syntax</type> 

<local-syntax> 

<![CDATA[ 

[select * 

from rfid_tag_sernum 

where @+reference] 
]]> 

</local-syntax> 



<documentation> 

<remarks> 

<![CDATA[ 

This command lists existing RFID serial numbers. 
]]> 

</remarks> 

<exception value="eOK"> 

The command completed successfully. 

</exception> 

</documentation> 

</command> 
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Archivos MvICMD 



> • Nombre del comando 



> El nombre del comando es lo que 
es referenciado o llamado por el 
sistema DLx® para ejecutar el 
código que contiene 

> El nombre es escrito como una 
descripción en ingles. 

> Los nombres son escritos en un 
formato de <verbo><nombre>. 
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Creando Comandos - Archivos *.MCMD 



<command> 

<name>list rfid gtin detaik/name> 

<description>List RFID GTIN detail.</description>. 

<type>Local Syntax</type> 

<local-syntax> 

<![CDATA[ 

[select * 

from rfid_tag_sernum 

where @+reference] 
]]> 

</local-syntax> 



<documentation> 

<remarks> 

<![CDATA[ 

This command lists existing RFID serial numbers. 
]]> 

</remarks> 

<exception value="eOK"> 

The command completed successfully. 

</exception> 

</documentation> 

</command> 



Descripción del comando 

> La descripción solo es usada para 
informar a los usuarios el propósito 
del comando. 

> No es usada para la ejecución del 
comando. 

> La descripción del comando debería 
contener más información que sólo el 
nombre del comando. 
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Creando Comandos - 



<command> 

<name>list rfid gtin detaik/name> 
<description>List RFID GTIN detail.</description> 
<type>Local Syntax</type> 

<local-syntax> ► 

<![CDATA[ 
[select * 

from rfid_tag_sernum 

where @+reference] 
]]> 

</local-syntax> 



<documentation> 

<remarks> 

<![CDATA[ 

This command lists existing RFID serial numbers. 
]]> 

</remarks> 

<exception value="eOK"> 

The command completed successfully. 

</exception> 

</documentation> 

</command> 
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Archivos *.MCMD 



Tipo de comando 

> Determina que tipo de sintaxis de 
comando será ejecutada. 

> Los tipos incluyen: 

• Funciones C 

• Funciones C simples 

• Métodos COM 

• Local Syntax 
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Creando Comandos - 



<command> 

<name>list rfid gtin detaik/name> 
<description>List RFID GTIN detail.</description> 
<type>Local Syntax</type> 
<local-syntax> 
<![CDATA[ 
[select * 

from rfid_tag_sernum 

where @+reference] 
]]> 

</local-syntax> 

J 



y 



<documentation> 

<remarks> 

<![CDATA[ 

This command lists existing RFID serial numbers. 
]]> 

</remarks> 

<exception value="eOK"> 

The command completed successfully. 

</exception> 

</documentation> 

</command> 
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Archivos MvICMD 



> • Sintaxis del Comando 

> Local syntax puede ejecutar: 

• Sentencias SQL 

• Sintaxis MOCA 

• Otros comandos MOCA 
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Recargar Memoria - Windows 

1 . Abra una ventana CMD y vaya a: 



{ Drive } \RedPrairie\<instance 
name>\MOCA\bin 



SI (.ommand F'iompt 



icrosoft Uinduus XP CUersion 5.1.2600] 
<C> Copyright 1985-2001 Microsoft Corp. 

C:\Documents and Settings\mstraka>cd \redprairieSdcs_devSmoca\bin 
C:\RedPrairie\dcs _de v \MOC A \b in >_ 



_ □ X 




RedPrairie 
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Recargar Memoria - Windows 



2. Ahora necesitamos crear nuestro archivo de ambiente 
ejecutando: 

servicemgr /dump /env=<instance name> 



ommand Piompt 



- □ x 



Microsoft Windows XP LUersion 5.1.2600] 
<C> Copyright 1985-2001 Microsoft Corp. 

C:\Docunents and Settings\mstraka>cd \redprairie\dcs_dev\moca\bin 
C:\RedPra ir ie\dcs_dev\MOCA\bin>seruicengr /dunp /enw=dcs_dew 
C:\RedPrairie\dcs _de v \MOC A \b in > 
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Recargar Memoria - Windows 



3. Ahora 

cargaremos el 

ambiente 

ejecutando: 

env 
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Recargar Memoria - Windows 

4. Finalmente ejecute el comando: 



mbuild 



Command Prompt - □ x 



C : \Re dPra ir ie \dc s _de v \MOC A \b in >s e t S L_I NH I B I T _OR A _OB J=t r ue 

C : \RedPrair ie\dcs_dev\MOCA\bin >set SLDI R=C : \RedPrair ie\dcs_de v\SEAMLES 

C : \Re dPra ir ie \dc s _de v \MOC A \b in >nibu i Id 

MBUILD 2005.2.5 - Product ion on Fri Jim 09 13:48:23 2006 

Copyright <c> 2002-2005 RedPrairie Corporation. A 11 rights reserwed. 



Reading conmand repository. . . 
Uriting commands memory file. 



Built Conponen t Levéis: 62 
Co minan ds : 4634 
Triggers: 462 
Argunents: 13949 
Local Syntax: 3077 

Total Elapsed Time: 17034 ns 

C : \RedPrair ie\dcs_dev\MOCA\bin >_ 
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Recargar Memoria - Windows 



• Después de que el archivo de memoria ha sido 
reconstruido los servicios deben reiniciarse para que 
puedan acceder a los nuevos comandos. 



_ 

Command Piompt - IDI Xj 



u 



[Reading command re pos itory . . . 
Uriting commands me mor y file... 



Built Componen t Levéis: 62 
Commands: 4634 
Triggers: 462 

ftrgunents: 13949 
Local Syntax: 3077 

Total Elapsed Time: 17034 ns 



C:\RedPrairie\dcs_dev\MOCA\bin>net stop moca.dcs_dev 

The RedPrairie <dcs_dev> seruice is stopping. 

The RedPrairie <dcs_dev> seruice was stopped successf ully. 



C:\RedPra ir ie\dcs_deuSMOCflSbin>net start moca.dcs_deu 

The RedPrairie <dcs_dew> serwice is start ing. 

The RedPrairie <dcs_deu> seruice was started successf ully . 



fc : \Re dPra ir ie \dc s _de w \MOCA \b in > 
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MOCA: Reemplazo de 
Variables 
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Remplazo de variables - @variable 
@variable 

• Remplazado por el valor de variable 

• El remplazo ocurre solo sí el operador usado para 
ingresar el valor de variable en la cláusula where es 
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@variable 



@variable 

[SELECT * 
FROM ord 
WHERE ordnum = @ ordnum 
AND wh id = @wh id] 




SELECT * 
FROM ord 
WHERE ordnum = ^TESTORDOl ' 
AND wh id = 'WMDl' 
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@variable 

@variable 

[SELECT * 
FROM ord 

WHERE ordnum = @ ordnum 

AND wh id = @wh id] 




SELECT * 
FROM ord 
WHERE ordnum = ^TESTORDOl ' 
AND wh id = NULL 
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Reemplazo de variables - @+variable 

@+variable 

Reemplazado por variable=value 

Sí la variable no es encontrada, es reemplazada por 
1=1 

Sí la variable fue puesta en la cláusula where con otro 
operador diferente de "=", se usa ese operador. 
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@+variable 



[SELECT * 
FROM ord 
WHERE @+ordnum 
AND @+wh_id] 




SELECT * 
FROM ord 

WHERE ordnum = ^TESTORDOl ' 

AND wh id = A WMDl ' 
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@+variable 
@+variable 

[SELECT * 
FROM ord 
WHERE @+ordnum 
AND @+wh_id] 

SELECT * 
FROM ord 
WHERE ordnum = 'TESTORD01' 
AND 1=1 
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Reemplazo de variables - @%variable 



@%variable 

Si el valor de la variable contiene los caracteres '_' o 
'%', es reemplazado por variable like valué, de otra 
manera remplazado usando el mismo formato que el 
usado para @+variable. 
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@%variable 



@%variable 

[SELECT * 
FROM ord 

WHERE @%ordnum 
AND @%wh_id] 

SELECT 
FROM 
WHERE 
AND 




ord 

ordnum = 'TESTORD01' 
wh id = A WMDl ' 
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@%variable 
@%variable 

[SELECT * 
FROM ord 

WHERE @%ordnum 
AND @%wh_id] 

SELECT * 
FROM ord 
WHERE ordnum = A TESTORD01 ' 
AND 1=1 
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@%variable 
@%variable 

[SELECT * 
FROM ord 

WHERE @%ordnum 
AND @%wh_id] 

SELECT * 
FROM ord 
WHERE ordnum = ^TESTORDOl ' 
AND wh id LIKE 'WM%' 
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Reemplazo de variables - @* 



Reemplazado por todas las variables en la cláusula 
where de la invocación actual del comando, en orden, 
en el mismo formato que el usado para @+variable. 
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[SELECT * 
FROM ord 

WHERE @%ordnum 
AND <§>*] 

SELECT 
FROM 
WHERE 
AND 




ord 

ordnum = 'TESTORD01' 
wh id = A WMDl ' 
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Reemplazo de variables - @@variable 

@@Variable 

Reemplazado por el valor de la variable de ambiente 
variable. 
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@@variable 
@@variable 

[SELECT * 
FROM users_view 
WHERE usr_id = @@usr_id] 



SELECT * 




FROM users_view 
WHERE usr id = 'SUPER' 
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Reemplazo de variables - @? 
@? 

Reemplazada por el estatus de terminación del último 
comando ejecutado. 
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@? 
@? 

[SELECT * 
FROM ord_dtl] catch(@?) 

I 

publish data 
where err_code = @? 

Publish data 

Where err code = x 0' 
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Reemplazo de variables - @\ 
@! 

# Reemplazado por el mensaje de error del último 
comando ejecutado 
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@! 
@! 

[SELECT * 
FROM ord_dtl] catch(@?) 

I 

publish data 
where err_sts = @! 

Publish data 

Where err sts = * Success 
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MOCA: Sintáxis Local 
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Sentencias SQL 



• Los comandos escritos entre corchetes son 
considerados SQL. 

• MOCA pasa sentencias SQL directamente al motor de 
base de datos después de efectuar el reemplazo de la 
variable. 

[sql statement] 
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Sentencias SQL 



[SELECT ord_num, 

ord_typ_txt , 
line_num, 
ord_qty 
FROM ord 
WHERE ord_num = ^TESTORDOl' 

AND ord typ txt = 'CUST' ] 
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Separadores de Comandos 

• El punto y coma permite ejecutar una secuencia de 
comandos y realizar un commit si todos los comandos 
son completados exitosamente o un rollback si 
cualquiera de los comandos falla. 

> Cada uno de los comandos separados por punto y coma se 
ejecuta independientemente de cualquier otro, es decir, no 
tienen datos devueltos por el comando anterior. 



command ; command 
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Comando Pipe 

• El pipe permite ejecutar un flujo de comandos. 

• Cada uno de los comandos separados por 
pipes tienen acceso a publicar datos y 
argumentos de comandos anteriores. 

command | command 
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Comando Pipe 



Publish data 

where ord_num = 'TESTORD01' 
and ord_typ_txt = 'CUST' 



[SELECT * 
FROM ord_dtl 
WHERE @+ord_num 
AND @+ord_typ_txt] 



SELECT * 

FROM ord_dtl 
WHERE ord_num = A TESTORD01 
AND ord typ txt = A CUST' 
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Concatenación de comandos 



• El ampersand concatena el resultado generado 
por un grupo de comandos dentro de un flujo. 



command & command 
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Agrupación de comandos 

• Pueden ser usados para agrupar comandos, 
permitiendo ejecutar comandos 
independientemente de algún otro que participe 
en el flujo por medio de un pipe. 



command | { command ; command } 
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Redireccionamiento 

• El conjunto de resultados puede ser puesto en 
una variable usando redireccionamiento. 

{ command & command} » varname 
I 

if (rowcount (@ varname) != 0) 
command 
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Redireccionamiento 



[select * 

from table] » record_set 

I 

if (rowcount (@ recordase t) >= 250) 
{ 

[select * 

from table 
where rownum <= 250] 

} 

else 
{ 

[select * 

from table] 

} 
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Condicionales 

• Los comandos pueden ser condicionalmente 
ejecutados usando una tendencia if-else. 

If (expr) 
{ 

commandl 

} 

else 
{ 

command2 

} 
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Condicionales 



if (@full_ship_flg = 1) 

{ 

[SELECT * 

FROM ord_dtl 
WHERE ord_num = @+ord_typ_txt 

AND ord_qty + adj_qty = shp_qty] 

} 

else 
{ 

[SELECT * 

FROM ord_dtl 
WHERE ord_num = @+ord_typ_txt] 

} 
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Excepciones 



• Todos los comandos que no terminen exitosamente lanzan 
excepciones. 

> Las excepciones pueden ser atrapadas usando la sentencia 
catch. 

> Las excepciones que son atrapadas permiten continuar la 
ejecución y causan que el código de error del comando sea 
cambiado a 0 para que la transacción de la base de datos sea 
efectuada. 

> Las excepciones que no sean atrapadas causan que la 
ejecución del comando actual sea detenida inmediatamente. 

command catch (errorcodel , [errorcode2, [•••]]) 
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Ejecución remota de comandos 

• Un comando puede ser executado en un servidor 
remoto MOCA usando la palabra remote. 

> El formato esperado es el siguiente: 

hostname : port. 

remote (system) command 

remote ( 1 wia4at01 : 4700#50 1 ) list users 
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MOCA: Reemplazo de 

Variables - Tipos de Cast 
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Reemplazo de variables Tipos de Cast - :raw 



• Usando una variable de la forma gvariabie : raw 
indicara a MOCA que escriba el contenido literal de esa 
variable. 

• Esto es útil cuando el valor de variable es una lista 
de cadenas de caracteres. 

Publish data 

where @order_by = A ord_num, ord_typ_txt' 
I 

[SELECT * 



FROM ord 
ORDER BY @order by:raw] 




[SELECT * 
FROM ord 



ORDER BY ord_num, 

ord typ txt] 
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Reemplazo de variables Tipos de Cast - :date 



• Usando una variable de la forma gvariabie : date 
indicara a MOCA que escriba el contenido de la variable 
con formato de fecha. 

• Esto es útil cuando el valor de variable es una fecha 

publish data where @rpt_dat = A 20050101000000' 
| [SELECT * FROM ord WHERE rpt dat = @rpt dat:date] 




select * from ord where adddte = TO DATE (' 20050101010203 ' ) 




select * from ord 
where adddte = CONVERT (DATE TIME , '2005-01-01 01:02:03') 



90 



■ RedPrairie 

Confidential ©2009 RedPrairie Corporation. All rights reserved. 



MOCA: Operadores 
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Operadores 



• Operadores 

+ Suma 

Resta 

* Multiplicación 
/ División 
% Módulo 

• Operadores de cadena de caracteres 

| | Concatena dos cadenas 
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Operadores 

• Operadores lógicos 

! Revierte las expresiones lógicas. 

and Combina 2 o más expresiones lógicas: 

TRUE si todo es verdadero; sino FALSE. 

or Combina 2 o más expresiones lógicas: 

TRUE si cualquiera es verdadero; sino 
FALSE. 
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Operadores 



• Operadores de comparación 

= Igualdad 
!= o diferencia 

> >= Mayor que, 

Mayor o igual a. 
< <= Menor que, Menor o igual a 

[not] like Coincide [No coincide] 

con un patrón específico. 
is[not] null [no] nulo. 
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MOCA: Funciones 
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Funciones - decode() 

decode(expr, search, result[, search, result, def ault] ) 

• Para evaluar esta expresión MOCA compara expr con 
cada valor de búsqueda uno por uno. 

• Si expr es igual a una búsqueda, MOCA regresa el 
resultado correspondiente. 

• Si ninguna coincidencia es encontrada, MOCA regresa 

def ault, o, si defauit es ignorado, regresa un 
valor nulo. 
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Funciones - nvl() 

nvl (expr , if -null-expr ) 

• Si expr esta determinada a ser NULL. La expresión 
representada por if-null-expr es devuelta, sino expr es 
devuelto. 

list orders 

where act_dt >= nvl (@beg_act_dt,act_dt) 
and act dt <= nvl(@end act dt,act dt) 
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MOCA: Wrappers 



■ RedPrairie 

Confidential ©2009 RedPrairie Corporation. All rights reserved. 



Wrappers 

• Wrappers ofrecen otra manera de extender la 
funcionalidad de un componente particular. 

• Un wrapper es un componente que usa MOCA para 
manejar múltiples niveles de componentes del mismo 
nombre. 

• Puede realizar alguna función y luego invocar a la 
siguiente versión de nivel de componente, si tiene el 
mismo nombre. 
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Wrappers 

if (@special_pack_list = f Y f ) 

produce special packing list 
else 

A produce packing list 
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MOCA: Comando Útiles 
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Comandos Útiles 



list user tables 

> Lista todas las tablas 

list table columns 

where table = A table_name' 

> Lista todas las columnas en una tabla 

list tables with column 

where column = ^column_name' 

> Lista todas las tablas que contengan la columna 

column ñame. 
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Comandos Útiles 



publish data where a=l and b=2 

> Este comando publica todos los argumentos en su cláusula 
where como un conjunto de resultados 

list library versions 

• Este comando lista todas las versiones de las librerías. 
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Comandos Útiles 



list column comment 
where table = 'table ñame ' 
and column = 'column ñame' 

> Este comando lista todos los comentarios asociados a una 
columna en la tabla 



list common columns on tables 
where tablel = 'first table ñame' 
and table2 = 'second table ñame 1 

> Este comando lista las columnas compartidas entre 2 tablas 

list table comment 
where table = 'table ñame A 

> Esto listará los comentarios para la tabla seleccionada, 

■ RedPrairie 
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Comandos Útiles 

list datábase locks 

> Este comando lista cualquier bloqueo que pueda existir en la 
base de datos 



list primary key for table 

where = 'table ñame 1 

> Este comando lista todas las llaves primarias de una tabla| 

list user tables | 
list table comment 
where table = @table_name catch(@?) 
Lista todos los comentarios de todas las tablas del sistema. 
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Comandos Útiles 



to_char 

> Esta función MOCA es usada para convertir fechas a 
caracteres. 

to_date 

> Esta función MOCA es usada para convertir cadenas a fechas. 

to_number 

> Esta función MOCA es usada para convertir cadenas de 
caracteres a números. 
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Comandos Utiles 

[select sysdate dt 

from dual] | 

publish data where x = to_char(@dt, 
1 YYYYMMDD 1 ) ~ 

[select to_char ( sysdate , 1 YYYYMMDD 1 ) dt_str 

from dual] | 

publish data where x = to_date ( @dt_str , 
1 YYYYMMDD 1 ) ~ ~ 

[select f 1123 f num 

from dual] | 

publish data where x = to_number ( @num, 
f 99V99 f ) 
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Comandos Utiles 

send email 

• Este comando envía un e-mail al destinatario dado. 

• Si un documento es dado, su contenido es enviado en 
el e-mail. 

• Si uno o más archivos adjuntos son dados, son 
enviados en el e-mail. 

put ftp 

• Este comando envía un archivo a otro host vía ftp. 
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Comandos Útiles 



convert list 

> El comando toma una cadena, un separador, y un tipo de 
conversión y separa cada palabra de la cadena dada usando el 
separador dado, construyendo una nueva lista del tipo de 
conversión dado. 

• Si el tipo de conversión es una 'L' (list), la cadena dada es 
dividida, con cada fila en el conjunto de resultados siendo 
una palabra de la cadena. 

• Si el tipo de conversión es una 'S', cada palabra en la 
cadena dada se encierra entre comillas sencillas. 

• Si el tipo de conversión es una 'D', cada palabra en la 
cadena dada es encerrada entre comillas. 

• Si no se pasa un separador, se usa la coma. 
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Comandos Útiles 



convert list 

where string = ! a,b,c,d ! 
and type = ' L ' 



retstr count 



a 
b 
c 
d 



1 

2 
3 
4 
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